home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2005 July / Macworld CD 17.05.iso / Data / Main.dxr / 00124_Stop Movie.ls < prev    next >
Encoding:
Text File  |  2000-02-28  |  2.3 KB  |  56 lines
  1. property movieSize, meS, TheMovie, moviebar, SmallMovieBox, SmallMovieBoxHotspot, LargeMovieBox, LargeMovieBoxHotspot, TheMaximizer, TheWindowshade
  2.  
  3. on new me
  4.   return me
  5. end
  6.  
  7. on getPropertyDescriptionList me
  8.   description = [:]
  9.   addProp(description, #TheMovie, [#default: 2, #format: #integer, #comment: "Spritenum of movie"])
  10.   addProp(description, #moviebar, [#default: 42, #format: #integer, #comment: "spritenum of Moviebar"])
  11.   addProp(description, #SmallMovieBox, [#default: 43, #format: #integer, #comment: "Spritenum of Small Movie Box"])
  12.   addProp(description, #SmallMovieBoxHotspot, [#default: 44, #format: #integer, #comment: "spritenum of small movie box hotspot"])
  13.   addProp(description, #LargeMovieBox, [#default: 45, #format: #integer, #comment: "Spritenum of Large Movie Box"])
  14.   addProp(description, #LargeMovieBoxHotspot, [#default: 46, #format: #integer, #comment: "Spritenum of Largemovie box hotspot"])
  15.   addProp(description, #TheMaximizer, [#default: 47, #format: #integer, #comment: "Spritenum of Maximizer"])
  16.   addProp(description, #TheWindowshade, [#default: 48, #format: #integer, #comment: "Spritenum of Windowshade"])
  17.   return description
  18. end
  19.  
  20. on endSprite me
  21.   m = sprite(TheMovie).movieSize
  22.   sprite(TheMovie).volume = 255
  23.   case m of
  24.     #Small:
  25.       sprite(TheMovie).movieRate = 0
  26.       devis(TheMovie)
  27.       devis(LargeMovieBox)
  28.       devis(LargeMovieBoxHotspot)
  29.       devis(SmallMovieBox)
  30.       devis(SmallMovieBoxHotspot)
  31.       vis(moviebar)
  32.       set the locH of sprite TheMaximizer to 177
  33.       set the locV of sprite TheMaximizer to 470
  34.       set the locH of sprite TheWindowshade to 194
  35.       set the locV of sprite TheWindowshade to 470
  36.       updateStage()
  37.       sprite(TheMovie).movieTime = 0
  38.       sprite(TheMovie).movieSize = #notPlaying
  39.     #Big:
  40.       sprite(TheMovie).movieRate = 0
  41.       devis(TheMovie)
  42.       devis(LargeMovieBox)
  43.       devis(LargeMovieBoxHotspot)
  44.       devis(SmallMovieBox)
  45.       devis(SmallMovieBoxHotspot)
  46.       vis(moviebar)
  47.       set the locH of sprite TheMaximizer to 177
  48.       set the locV of sprite TheMaximizer to 470
  49.       set the locH of sprite TheWindowshade to 194
  50.       set the locV of sprite TheWindowshade to 470
  51.       updateStage()
  52.       sprite(TheMovie).movieTime = 0
  53.       sprite(TheMovie).movieSize = #notPlaying
  54.   end case
  55. end
  56.